home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / wlib11_2.zip / EXAMPLES.EXE / EXAM38.C < prev    next >
C/C++ Source or Header  |  1991-03-13  |  620b  |  23 lines
  1.   #include "window.h"
  2.   #include <stdio.h>
  3.   #define NORM   CREATE_VIDEO_ATTRIBUTE(black,white)
  4.  
  5.   WPOINTER w;
  6.   FILE *outfile;
  7.   char *filename = "wintext";
  8.   char *filename2 = "wintext2";
  9.  
  10.   main()
  11.   {
  12.     int i;
  13.     WindowInitializeSystem();
  14.     WindowSaveInitial(0);
  15.     w = WindowInitialize(BORDER,1,1,20,10,NORM,NORM,SINGLEBOX);
  16.     WindowOpen(w);
  17.     WindowDisplay(w,1,NOEFFECT);
  18.     for (i=1;i<=10;i++)
  19.       WindowWriteString(w,"Hello World!!",i,1);
  20.     GET_KEY();
  21.     WindowWriteTextToFile(w,filename,1);  /* use newlines */
  22.     WindowWriteTextToFile(w,filename2,0); /* no newlines */
  23.   }